home *** CD-ROM | disk | FTP | other *** search
/ Atari Mega Archive 1 / Atari Mega Archive - Volume 1.iso / mint / utils / lack.zoo / acc.c next >
C/C++ Source or Header  |  1993-12-20  |  762b  |  41 lines
  1. #include "gemlib/gemfast.h"
  2. #include "gemlib/aesbind.h"
  3. #include <osbind.h>
  4. #include <mintbind.h>
  5. #include <basepage.h>
  6. #include <minimal.h>
  7. #include "lack.h"
  8.  
  9. char *_ltoa (long n, char *buffer, int radix);
  10.  
  11. int mess[8];
  12. long _stksize=1024;
  13. void *curapp;
  14.  
  15. main()
  16. {
  17.     NEW_AESP(a);
  18.     BASEPAGE *b=_base;
  19.     long reply=0;
  20. /*    char where[40];
  21.     
  22.     strcpy(&where[0], "my basepage is at ");
  23.     _ltoa((long)b, &where[18], 16);
  24.     Cconws(where);
  25.     strcpy(&where[0], " main is at ");
  26.     _ltoa((long)main, &where[12], 16);
  27.     Cconws(where);
  28.     Cconws("\r\n");
  29. */
  30.     _aesparams=&a;
  31.     reply=Dcntl(LA_INIT_ACC, "S:", b);
  32.     if(reply<1) appl_init();
  33.     while(reply<1)
  34.     {
  35.         evnt_mesag(mess);
  36.         reply=Dcntl(LA_INIT_ACC, "S:", b);
  37.     }
  38.     Super(0);
  39.     longjump(reply);
  40. }
  41.